(url-mail-command): Don't test fboundp of `compose-mail'.

diff --git a/lisp/url/url-vars.el b/lisp/url/url-vars.el
index 53b8a5eef31551f65bb5cf7655fef6095e16efb3..245149068f1a2a6512837f9fcfb28f53c2575d64 100644 (file)
--- a/lisp/url/url-vars.el
+++ b/lisp/url/url-vars.el
@@ -174,9 +174,7 @@ variable."
                       (string :tag "Encoding")))
   :group 'url-mime)
 
-(defcustom url-mail-command (if (fboundp 'compose-mail)
-                               'compose-mail
-                             'url-mail)
+(defcustom url-mail-command 'compose-mail
   "*This function will be called whenever url needs to send mail.
 It should enter a mail-mode-like buffer in the current window.
 The commands `mail-to' and `mail-subject' should still work in this